(isearch-complete-edit, isearch-ring-advance-edit):

Use erase-field instead of erase-buffer.

diff --git a/lisp/isearch.el b/lisp/isearch.el
index 9333b7ca9a24a6cd8253daadf156d5311b9299b5..8f93bbfcab7da76b723df9bbbe130344fe0ab001 100644 (file)
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -1324,7 +1324,7 @@ With prefix arg N, insert the Nth element."
                 (mod (- (or yank-pointer 0) n)
                      length)))
 
-      (erase-buffer)
+      (erase-field)
       (insert (nth yank-pointer ring))
       (goto-char (point-max)))))
 
@@ -1393,7 +1393,7 @@ If there is no completion possible, say so and continue searching."
   (setq isearch-string (buffer-string))
   (if (isearch-complete1)
       (progn
-       (erase-buffer)
+       (erase-field)
        (insert isearch-string))))
 
 \f